home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 48 / Amiga Format CD48 (1999-12-13)(Future Publishing)(GB)(Track 1 of 2)[!][issue 2000-01].iso / -serious- / programming / c / stormamiga_lib / hd-installer_script < prev    next >
Text File  |  1999-11-01  |  5KB  |  186 lines

  1. ;*************************************************************
  2. ;*  stormamiga.lib Installer Version 3.5ud  26.October 1999  *
  3. ;*                                                           *
  4. ;*         Copyright © 1996/99 by CyberdyneSystems           *
  5. ;*                written by Matthias Henze                  *
  6. ;*       english translation written by Thomas Blätte        *
  7. ;*                                                           *
  8. ;*************************************************************
  9. ;
  10. ; $VER: HD-Installer_script 3.5ud (26.10.99)
  11.  
  12. (set stormamiga-Version "Version 45.00 alpha 5")
  13. (set stormamiga-Datum "26.Oktober 1999")
  14. (set stormamiga-Datum_e "26 October 1999")
  15.  
  16. ;====================================================================
  17. ; Initialisierungen
  18. ;====================================================================
  19.  
  20. (set @default-dest "")
  21.  
  22. (if (= @language "deutsch")
  23.  (
  24.     (set #welcome (cat
  25.     "\nWillkommen bei der Installation der \n"
  26.     "D E M O V E R S I O N\n"
  27.     "der\n"
  28.     "\"stormamiga.lib\"\n"
  29.     ""stormamiga-Version" vom "stormamiga-Datum"\n\n"
  30.     "Dieses Skript installiert die \"stormamiga.lib\",\n"
  31.     "entsprechend Ihrer Angaben, auf Ihre Festplatte.\n\n\n"
  32.     "Kopierrecht © 1996/99 bei CyberdyneSystems\n"
  33.     "geschrieben von Matthias Henze"))
  34.        
  35.     (set #Versions_Auswahl (cat
  36.     "\nWählen Sie die Bibliothek(en) aus, die Sie installieren möchten.\n"))
  37.     
  38.     (set #MC68EC020+            " Bibliothek für MC68EC020+")
  39.     
  40.     (set #ja    "ja")
  41.     (set #nein  "nein")
  42.     
  43.        
  44.     (set #Spezialfunktionen_Auswahl (cat
  45.     "\nMöchten Sie die Spezialfunktionen der \"stormamiga.lib\" nutzen.\n"))
  46.     
  47.     
  48.     (set #User.dic_Auswahl (cat
  49.     "\nUm das Syntax Highlighting auch für die Spezialfunktionen der \"stormamiga.lib\" nutzen zu können, ist es notwendig ein Benutzerlexikon zu installieren.\n"
  50.     "\nWählen Sie aus, ob und mit welchem Name das Benutzerlexikon installiert werden soll.\n"))
  51.     
  52.     (set #User1.dic     "User 1.dic")
  53.     (set #User2.dic     "User 2.dic")
  54.     (set #User3.dic     "User 3.dic")
  55.     (set #kein_User.dic "Kein Benutzerlexikon installieren")
  56.  )
  57.  (
  58.     (set #welcome (cat
  59.     "\nWelcome to the installation of the\n"
  60.     "D E M O V E R S I O N\n"
  61.     "of\n"
  62.     "\"stormamiga.lib\"\n"
  63.     ""stormamiga-Version" from "stormamiga-Datum_e"\n\n"
  64.     "This script installs the \"stormamiga.lib\"\n"
  65.     "according to your specification to your harddisk.\n\n\n"
  66.     "Copyright © 1996/99 by CyberdyneSystems\n"
  67.     "written by Matthias Henze"))
  68.     
  69.        
  70.     (set #Versions_Auswahl (cat
  71.     "\nPlease choose the library(-ies) you want to install.\n"))
  72.     
  73.     (set #MC68EC020+            " library for MC68EC020+")
  74.        
  75.  
  76.     (set #ja    "yes")
  77.     (set #nein  "no")
  78.     
  79.        
  80.     (set #Spezialfunktionen_Auswahl (cat
  81.     "\nDo you want to use the special functions of the \"stormamiga.lib\"?\n"))
  82.     
  83.     
  84.     (set #User.dic_Auswahl (cat
  85.     "\nTo make Syntax Highlighting also available for the special functions of the \"stormamiga.lib\", it is necessary to install a user dictonary.\n"
  86.     "\nPlease choose the name of the user dictionary if you like to install it.\n"))
  87.     
  88.     (set #User1.dic     "User 1.dic")
  89.     (set #User2.dic     "User 2.dic")
  90.     (set #User3.dic     "User 3.dic")
  91.     (set #kein_User.dic "No user dictonary")
  92.  )
  93. )
  94. (set Quelle-dic "StormSYS/Dictionary/User.dic")
  95. (set Ziel-dic "StormC:StormSYS/Dictionary")
  96.  
  97. ;=====================================================================================
  98. ; Beginn der Installation
  99. ;=====================================================================================
  100.  
  101. (message #welcome)
  102. (welcome)
  103.  
  104. (if (= (exists "StormC:Include/stormamigainline.h" (noreq)) 1)
  105.   (
  106.     (run "delete StormC:Include/stormamigainline.h")
  107.   )
  108. )
  109.  
  110. (
  111.   (set wähle_Libs
  112.     (askoptions
  113.       (prompt #Versions_Auswahl)
  114.       (help   @askoptions-help)
  115.       (choices
  116.     #MC68EC020+
  117.       )
  118.     )
  119.   )
  120.   (if (IN wähle_Libs 0) (set MC68EC020+ 1))
  121.  
  122.   (if (= MC68EC020+  1)
  123.     (copyfiles
  124.       (source "lib/stormamiga.lib")
  125.       (dest "StormC:Lib")
  126.     )
  127.   )
  128. )
  129.  
  130. (
  131.   (set Spezialfunktionen_Auswahl
  132.     (askchoice
  133.       (prompt #Spezialfunktionen_Auswahl)
  134.       (help   @askchoice-help)
  135.       (default 0)
  136.       (choices
  137.     #ja
  138.     #nein
  139.       )
  140.     )
  141.   )
  142.   (if (= Spezialfunktionen_Auswahl 0)
  143.     (
  144.       (copyfiles
  145.     (source "Include")
  146.     (dest "StormC:Include")
  147.     (all)
  148.       )
  149.       (set kopiere_User.dic
  150.     (askchoice
  151.       (prompt #User.dic_Auswahl)
  152.       (help   @askchoice-help)
  153.       (default 0)
  154.       (choices
  155.         #User1.dic
  156.         #User2.dic
  157.         #User3.dic
  158.         #kein_User.dic
  159.       )
  160.     )
  161.       )
  162.       (if (= kopiere_User.dic 0)
  163.     (copyfiles
  164.       (source Quelle-dic)
  165.       (dest Ziel-dic)
  166.       (newname "User 1.dic")
  167.     )
  168.       )
  169.       (if (= kopiere_User.dic 1)
  170.     (copyfiles
  171.       (source Quelle-dic)
  172.       (dest Ziel-dic)
  173.       (newname "User 2.dic")
  174.     )
  175.       )
  176.       (if (= kopiere_User.dic 2)
  177.     (copyfiles
  178.       (source Quelle-dic)
  179.       (dest Ziel-dic)
  180.       (newname "User 3.dic")
  181.     )
  182.       )
  183.     )
  184.   )
  185. )
  186.